my $checkout = fetchall_hash("checkout")
    or return;

foreach my $path (
    sort {
	($checkout->{$b}{prio} <=> $checkout->{$a}{prio}) ||
	($Rollout::_checkout_order{ $a } <=> $Rollout::_checkout_order{ $b })
    } keys %{ $checkout })
{
    next unless -e "$path/rollout.cfg";

    my $info = $checkout->{$path};
    our ($_path, $_module, $_class) = ($path, $info->{module}, "CVS_$info->{repos}_$info->{module}");

    add_class $_class;

    do "$path/rollout.cfg";
    die "$path/rollout.cfg: $@" if $@;
}

1;
